home *** CD-ROM | disk | FTP | other *** search
/ Tech Arsenal 1 / Tech Arsenal (Arsenal Computer).ISO / tek-01 / zendisk1.zip / LST9-21.ASM < prev    next >
Assembly Source File  |  1990-02-15  |  189b  |  13 lines
  1. ;
  2. ; *** Listing 9-21 ***
  3. ;
  4. ; Times shifts performed by shifting CL times.
  5. ;
  6. BITS_TO_SHIFT    equ    1
  7.     call    ZTimerOn
  8.     rept    100
  9.     mov    cl,BITS_TO_SHIFT
  10.     shl    ax,cl
  11.     endm
  12.     call    ZTimerOff
  13.